home *** CD-ROM | disk | FTP | other *** search
/ Windows 6-Pak - Disc 4 / Windows 6-Pak (InfoMagic) (Disc 4) (1999).ISO / 3D-Graphics-Editors / lsystem3.exe / L System 3 / _setup.1 / BUTTER.LS < prev    next >
Text File  |  1998-05-11  |  903b  |  29 lines
  1. #------Lparser/Mutator------Martin Higgs--------
  2. # This file produces a butterfly. (not yet finalised)
  3. 10
  4. 20
  5. 80
  6. L
  7. L=[A][B][C][T][H] # axiom - butterfly
  8. # --- thorax / abdomen
  9. A=[cc^(90)f(-2)FcccaFaFaFaFaFaF]
  10. a='(.75)&(5)
  11. # --- head --- eyes --- /   --- tongue - atennae ---
  12. H=[cccc&(90)'F[f(-4)c+(90)''Z][f(-4)c-(90)''Z][J][K][M]]
  13. # --- tongue ---
  14. J=ccccccjF''F''&F''&&F''&&F''&&F''&&F''&&F''&&F
  15. j=!!!!'''''''
  16. # --- antenae ---
  17. K=ccc+<<j^^F''F''F''F''F''F''^F''^F''^F
  18. M=ccc->>j^^F''F''F''F''F''F''^F''^F''^F
  19. k=!!!!''''''''
  20. # --- wings ---
  21. B=+(25)[{-(90)&&fff^^f^^^z^^f^^f}][c{+(-90)^(5)ff^^^f^^f^^z^^^f)}]
  22. C=|-(25)[{-(90)&&fff^^f^^^z^^f^^f}][c{+(-90)^(5)ff^^^f^^f^^z^^^f)}]
  23. # --- legs ---
  24. N=|[ccc!!!!!!!!!!!!^^F^Z^Z]         # leg 1
  25. O=|[ccc!!!!!!!!!!!!^^F^Z^^Z]         # leg 2
  26. P=|[ccc!!!!!!!!!!!!^^F^^^Z^^^Z]       # leg 2
  27. T=[-N][+N][-^O][+^O][<-^^^P][>+^^^P]  # six legs
  28. @
  29.